﻿Public Class DMBacSi
    Private Sub DMBacSi_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Me.DMBacSiTableAdapter.Fill(Me.PCV_CLINICDataSet_Don.DMBacSi)
    End Sub
    Public Sub New()
        InitializeComponent()
        Me.setObj(Me.PCV_CLINICDataSet_Don, Me.PCV_CLINICDataSet_Don.DMBacSi, Me.DMBacSiBindingSource, Me.TableAdapterManager, DMBacSiTableAdapter, MaITextEdit)
    End Sub
    Private Shadows Sub BarButtonItemBaoCao_ItemClick(sender As System.Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItemBaoCao.ItemClick
        Dim report As XtraReportDMBacSi = New XtraReportDMBacSi
        report.ShowRibbonPreview()
    End Sub

End Class
